home *** CD-ROM | disk | FTP | other *** search
/ Precision Software Appli…tions Silver Collection 1 / Precision Software Applications Silver Collection Volume One (PSM) (1993).iso / windows / games / bjack1.exe / FRMINSTA.FRM (.txt) < prev    next >
Visual Basic Form  |  1991-11-19  |  8KB  |  175 lines
  1. FrmInstall
  2. Server Service Installer
  3. wwwwwwwwwwwwwp
  4. wwwwwwwwwwwwwww
  5. wwwwwp
  6. wwwwwp
  7. Form1
  8. LblServerName
  9. &Server Name
  10.     CmbServer
  11. CmdInstall
  12. &Install
  13. Frame2
  14. &Performance Server
  15. ChkPsInstall
  16. Install
  17.     ChkPsAuto
  18. Auto Start
  19. ChkPsNow
  20.     Start Now
  21. Frame1
  22. &Blackjack
  23. ChkBjInstall
  24. Install
  25. ChkBjNow
  26.     Start Now
  27. CmdHelp
  28. &Help
  29. CmdExit
  30. E&xit
  31. Form_Click
  32. Form_LinkCloseq
  33.     Form_Load
  34. startupdir
  35. result
  36. LMNetServerEnum2_L1
  37. ServerInfoK
  38. SV_TYPE_ALL
  39. NERR_SUCCESS5
  40. lmerror
  41. MB_ICONEXCLAMATION
  42. MB_ABORTRETRYIGNORE@
  43. ApplicationName
  44. IDABORT
  45. IDRETRY
  46. FrmDefineEventF
  47.     CmbServer
  48. sv1_name
  49. server_info_1a
  50. FrmInstall
  51. CmdInstall_Click
  52. UseInfo)
  53. use_info_1
  54.     ui1_local
  55.     ui_remote
  56. servername
  57. ui_asg_typeO
  58. USE_DISKDEV
  59. LMNetUseAdd
  60. CRLF?
  61. ui1_remote
  62. ui1_asg_typep
  63. LMNetUseAdd_L1x
  64. ui1_password
  65. ui_passwordc
  66. ui1_typeR
  67. ChangeLanManINI
  68. Command1_Click>
  69. TxtDriveLetter;
  70. copyfile
  71. ChkBlackjack3
  72. CHECKED[
  73. ChkBjInstall_Clickq
  74. ChkBjInstall
  75.     ChkBjAuto
  76. enabled
  77. ChkBjNow
  78. FALSE
  79. ChkPsInstall_Click
  80. ChkPsInstall
  81.     ChkPsAuto
  82. ChkPsNow
  83. value
  84. ChkBj
  85. Unable
  86.     Blackjack
  87. service
  88. server
  89. startservice
  90.     autostart
  91. currentdirI
  92. CmdHelp_Click
  93. WinHelp
  94. HwndZ
  95. HELPFILE
  96. HELP_INDEX
  97. CmdExit_Click
  98. Dummy
  99.     HELP_QUIT
  100. mousepointer
  101.     HOURGLASS
  102. RestoreLanmanIni
  103. text1
  104. Installation
  105. halted
  106. CmdInstall
  107. MB_OK
  108. Form_Load
  109.  set the current directory for the file copy
  110.  Call the VB LAN Manager Toolkit sample function for
  111.  enumerating servers.  Use this to populate the Available
  112.  Servers combo box.s
  113. Error attempting to enumerate servers.
  114. Error <"
  115.  exit the loop
  116.  populate server combo box
  117. CmdInstall_Click
  118. No server name entered.  Service can not be installed.
  119.  starts with a single \d
  120.  make it a double \\
  121.  make it start with \\
  122. check the servername to make sure that it is a valid 8.3 name else all the file operations will fail
  123. \\12345678.123
  124. \\12345678
  125.  is too long a name for the copy functions
  126. to work.  Please refer to the online help for"
  127. instructions on how to install the service(s) by hand.
  128. Check for the length of the valid unc name for file open
  129. \admin$"
  130.  there is a known bug in autostarting the blackjack servicek
  131.  and the perfsvr service at the same time, hence the code to
  132.  autostart blackjack is commented out at this time
  133. If ChkBjAuto.value = CHECKED Theno
  134.  autostart = TRUE=
  135. Else autostart = FALSE
  136. End If
  137. blackjack"
  138. bjsvr.exe"
  139. Unable to modify LANMAN.INI file on server "
  140. You must have admin privilege to perform this operation.
  141. Installation halted.
  142. \bjsvr.exe
  143. \services\bjsvr.exe"
  144.  check for the return error code
  145. Unable to Copy Blackjack service file to server 
  146. Make sure that the Blackjack service is not already running.
  147. Installation halted.
  148. blackjack"
  149. The Blackjack service could not be started."
  150.  no need to exit the sub,  the install was okN
  151. The Blackjack service was successfully installed on 
  152. Now do the same thing for the performance server service.  I
  153. perfsvr"
  154. perfsvr.exe"
  155. Unable to modify LANMAN.INI file on server "
  156. You must have admin privilege to perform this operation.
  157. Installation halted.
  158. \perfsvr.exe
  159. \services\perfsvr.exe"
  160.  check for the return error code after copying the filee
  161. Unable to copy Perfsvr service file to server 
  162. Make sure that the Perfsvr service is not already running.
  163. Installation halted.
  164. perfsvr"
  165. The Perfsvr service could not be started."
  166.  No need to exit the sub, the install went okN
  167. The Perfsvr service was successfully installed on 
  168. ChkBjInstall_Click
  169. ChkBjAuto.enabled = TRUE
  170. ChkBjAuto.enabled = FALSE
  171. ChkBjAuto.value = FALSES
  172. ChkPsInstall_Click
  173. CmdHelp_Click
  174. CmdExit_Click
  175.